/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 01 New Uploads / P4UTIL.ZIP / RNDGENRT.PRG

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 10 0a 10 01 00 89 39 | 31 30 00 2b 10 0a 00 8f |.......9|10.+....|
|00000010| 20 2a 2a 47 45 4e 45 52 | 41 4c 20 49 4e 50 55 54 | **GENER|AL INPUT|
|00000020| 20 52 4f 55 54 49 4e 45 | 20 2a 2a 00 47 10 23 00 | ROUTINE| **.G.#.|
|00000030| 8f 20 2b 2b 2b 20 49 4e | 50 55 54 20 53 45 43 54 |. +++ IN|PUT SECT|
|00000040| 49 4f 4e 20 2b 2b 2b 00 | 5f 10 28 00 97 55 4f 2c |ION +++.|_.(..UO,|
|00000050| 30 3a 55 52 24 b2 22 22 | 3a 55 49 24 b2 22 22 00 |0:UR$.""|:UI$."".|
|00000060| 6f 10 2a 00 8b 55 4c b2 | 30 a7 55 4c b2 38 30 00 |o.*..UL.|0.UL.80.|
|00000070| 82 10 2d 00 99 22 20 20 | 9d 9d 22 3b 3a 97 55 43 |..-.."  |..";:.UC|
|00000080| 2c 30 00 96 10 32 00 a1 | 55 49 24 3a 8b 55 49 24 |,0...2..|UI$:.UI$|
|00000090| b2 22 22 a7 35 30 00 c0 | 10 37 00 8b 55 49 24 b2 |."".50..|.7..UI$.|
|000000a0| c7 28 31 33 29 af c3 28 | 55 52 24 29 b1 b2 31 a7 |.(13)..(|UR$)..1.|
|000000b0| 97 55 43 2c 31 3a 99 22 | 20 9d 22 3b 3a 89 38 35 |.UC,1:."| .";:.85|
|000000c0| 00 d3 10 3c 00 8b 55 49 | 24 b2 c7 28 32 30 29 a7 |...<..UI|$..(20).|
|000000d0| 31 30 35 00 e7 10 3e 00 | 8b 20 c3 28 55 52 24 29 |105...>.|. .(UR$)|
|000000e0| b2 b1 55 4c a7 35 30 00 | 0c 11 41 00 8d 31 32 30 |..UL.50.|..A..120|
|000000f0| 3a 8f 20 43 48 45 43 4b | 20 46 4f 52 20 56 41 4c |:. CHECK| FOR VAL|
|00000100| 49 44 20 43 48 41 52 41 | 43 54 45 52 00 1c 11 46 |ID CHARA|CTER...F|
|00000110| 00 55 52 24 b2 55 52 24 | aa 55 49 24 00 26 11 4b |.UR$.UR$|.UI$.&.K|
|00000120| 00 99 55 49 24 3b 00 2e | 11 50 00 89 35 30 00 53 |..UI$;..|.P..50.S|
|00000130| 11 55 00 8f 20 2b 2b 2b | 20 43 48 45 43 4b 20 46 |.U.. +++| CHECK F|
|00000140| 4f 52 20 48 45 4c 50 20 | 52 45 51 55 45 53 54 20 |OR HELP |REQUEST |
|00000150| 2b 2b 2b 00 7b 11 5a 00 | 8b 55 52 24 b2 55 58 24 |+++.{.Z.|.UR$.UX$|
|00000160| a7 31 39 35 3a 8f 20 45 | 58 49 54 20 54 4f 20 48 |.195:. E|XIT TO H|
|00000170| 45 4c 50 20 52 4f 55 54 | 49 4e 45 00 8a 11 5f 00 |ELP ROUT|INE..._.|
|00000180| 8b 55 46 b2 31 a7 8d 32 | 34 30 00 97 11 64 00 55 |.UF.1..2|40...d.U|
|00000190| 46 b2 30 3a 99 3a 8e 00 | b0 11 66 00 8f 20 2b 2b |F.0:.:..|..f.. ++|
|000001a0| 20 43 48 45 43 4b 20 44 | 45 4c 45 54 45 20 2b 2b | CHECK D|ELETE ++|
|000001b0| 00 c1 11 69 00 8b c3 28 | 55 52 24 29 b3 31 a7 35 |...i...(|UR$).1.5|
|000001c0| 30 00 d9 11 6e 00 55 52 | 24 b2 c8 28 55 52 24 2c |0...n.UR|$..(UR$,|
|000001d0| c3 28 55 52 24 29 ab 31 | 29 00 eb 11 73 00 99 22 |.(UR$).1|)...s.."|
|000001e0| 9d 20 20 9d 9d 22 3b 3a | 89 35 30 00 12 12 78 00 |.  ..";:|.50...x.|
|000001f0| 8f 20 2b 2b 20 43 48 45 | 43 4b 20 46 4f 52 20 56 |. ++ CHE|CK FOR V|
|00000200| 41 4c 49 44 20 43 48 41 | 52 41 43 54 45 52 53 20 |ALID CHA|RACTERS |
|00000210| 2b 2b 00 24 12 7d 00 8b | c3 28 55 53 24 29 b2 30 |++.$.}..|.(US$).0|
|00000220| a7 31 35 30 00 35 12 82 | 00 81 55 53 b2 31 a4 c3 |.150.5..|..US.1..|
|00000230| 28 55 53 24 29 00 4c 12 | 87 00 8b 55 49 24 b2 ca |(US$).L.|...UI$..|
|00000240| 28 55 53 24 2c 55 53 2c | 31 29 a7 8e 00 52 12 8c |(US$,US,|1)...R..|
|00000250| 00 82 00 5f 12 91 00 55 | 49 24 b2 22 22 3a 8e 00 |..._...U|I$."":..|
|00000260| 7a 12 96 00 8f 20 2a 2a | 20 53 54 41 4e 44 41 52 |z.... **| STANDAR|
|00000270| 44 20 49 4e 50 55 54 20 | 2a 2a 00 8b 12 98 00 8b |D INPUT |**......|
|00000280| c6 28 55 49 24 29 b2 34 | 36 a7 8e 00 9c 12 9b 00 |.(UI$).4|6.......|
|00000290| 8b 55 49 24 b2 c7 28 33 | 32 29 a7 8e 00 b9 12 a0 |.UI$..(3|2)......|
|000002a0| 00 8b c6 28 55 49 24 29 | b3 34 38 b0 c6 28 55 49 |...(UI$)|.48..(UI|
|000002b0| 24 29 b1 35 37 a7 31 37 | 30 00 bf 12 a5 00 8e 00 |$).57.17|0.......|
|000002c0| dc 12 aa 00 8b c6 28 55 | 49 24 29 b3 36 35 b0 c6 |......(U|I$).65..|
|000002d0| 28 55 49 24 29 b1 39 30 | a7 31 38 30 00 e2 12 af |(UI$).90|.180....|
|000002e0| 00 8e 00 06 13 b4 00 8b | c6 28 55 49 24 29 b3 31 |........|.(UI$).1|
|000002f0| 39 33 b0 c6 28 55 49 24 | 29 b1 32 31 38 a7 55 49 |93..(UI$|).218.UI|
|00000300| 24 b2 22 22 3a 8e 00 29 | 13 b9 00 8b c2 28 55 54 |$."":..)|.....(UT|
|00000310| 29 b2 55 55 25 a7 55 49 | 24 b2 c7 28 c6 28 55 49 |).UU%.UI|$..(.(UI|
|00000320| 24 29 ab 31 32 38 29 3a | 8e 00 2f 13 bb 00 8e 00 |$).128):|../.....|
|00000330| 3c 13 be 00 55 49 24 b2 | 22 22 3a 8e 00 61 13 c3 |<...UI$.|"":..a..|
|00000340| 00 55 46 b2 31 3a 8f 20 | 2b 2b 2b 20 48 45 4c 50 |.UF.1:. |+++ HELP|
|00000350| 20 52 4f 55 54 49 4e 45 | 20 45 58 49 54 20 2b 2b | ROUTINE| EXIT ++|
|00000360| 2b 00 6a 13 c5 00 8d 32 | 35 30 00 73 13 c8 00 8d |+.j....2|50.s....|
|00000370| 32 34 35 00 92 13 cd 00 | 81 55 51 b2 55 42 a4 28 |245.....|.UQ.UB.(|
|00000380| 55 32 25 ac 32 35 36 aa | 55 31 25 aa 55 33 25 ab |U2%.256.|U1%.U3%.|
|00000390| 32 29 00 ae 13 d2 00 55 | 51 25 28 55 51 ab 55 42 |2).....U|Q%(UQ.UB|
|000003a0| 29 b2 c2 28 55 51 29 3a | 82 3a 99 22 93 22 00 c1 |)..(UQ):|.:."."..|
|000003b0| 13 d7 00 55 5a b2 31 3a | 55 56 25 b2 c2 28 55 54 |...UZ.1:|UV%..(UT|
|000003c0| 29 00 ca 13 d8 00 89 33 | 30 30 00 ef 13 d9 00 55 |)......3|00.....U|
|000003d0| 5a b2 30 3a 55 53 24 b2 | 55 4a 24 3a 55 47 24 b2 |Z.0:US$.|UJ$:UG$.|
|000003e0| 55 4b 24 3a 55 50 b2 55 | 4a 3a 55 4c b2 55 4b 00 |UK$:UP.U|J:UL.UK.|
|000003f0| 11 14 da 00 99 22 93 22 | 3b 3a 97 36 35 33 30 31 |....."."|;:.65301|
|00000400| 2c 36 3a 97 36 35 33 30 | 35 2c 31 33 3a 89 32 32 |,6:.6530|5,13:.22|
|00000410| 30 00 1b 14 db 00 99 22 | 93 22 3b 00 4a 14 dc 00 |0......"|.";.J...|
|00000420| 55 54 24 b2 55 4c 24 3a | 97 55 54 2c 55 56 25 3a |UT$.UL$:|.UT,UV%:|
|00000430| 81 55 51 b2 55 42 a4 28 | 55 32 25 ac 32 35 36 aa |.UQ.UB.(|U2%.256.|
|00000440| 55 31 25 aa 55 33 25 ab | 33 29 00 5f 14 e1 00 97 |U1%.U3%.|3)._....|
|00000450| 55 51 2c 55 51 25 28 55 | 51 ab 55 42 29 3a 82 00 |UQ,UQ%(U|Q.UB):..|
|00000460| 6b 14 e6 00 97 55 31 2c | 55 31 25 00 77 14 e8 00 |k....U1,|U1%.w...|
|00000470| 97 55 32 2c 55 32 25 00 | 83 14 e9 00 97 55 34 2c |.U2,U2%.|.....U4,|
|00000480| 55 34 25 00 91 14 ea 00 | 97 55 33 2c 55 33 25 ab |U4%.....|.U3,U3%.|
|00000490| 31 00 99 14 eb 00 89 33 | 35 00 cb 14 f0 00 55 44 |1......3|5.....UD|
|000004a0| 25 b2 28 28 55 32 25 ac | 32 35 36 aa 55 31 25 aa |%.((U2%.|256.U1%.|
|000004b0| 55 33 25 29 ab 55 42 29 | ad 34 30 3a 99 c8 28 55 |U3%).UB)|.40:..(U|
|000004c0| 44 24 2c 55 44 25 aa 31 | 29 3a 8e 00 06 15 f5 00 |D$,UD%.1|):......|
|000004d0| 99 c8 28 55 44 24 2c 32 | 34 29 3b 22 20 20 20 20 |..(UD$,2|4);"    |
|000004e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000004f0| 20 20 12 20 48 45 4c 50 | 20 43 4f 4d 49 4e 47 20 |  . HELP| COMING |
|00000500| 92 20 20 22 3a 8e 00 32 | 15 fa 00 55 31 25 b2 c2 |.  ":..2|...U1%..|
|00000510| 28 55 31 29 3a 55 32 25 | b2 c2 28 55 32 29 3a 55 |(U1):U2%|..(U2):U|
|00000520| 33 25 b2 c2 28 55 33 29 | 3a 55 34 25 b2 c2 28 55 |3%..(U3)|:U4%..(U|
|00000530| 34 29 00 5a 15 fb 00 55 | 4a 24 b2 55 53 24 3a 55 |4).Z...U|J$.US$:U|
|00000540| 4b 24 b2 55 47 24 3a 55 | 4c 24 b2 55 54 24 3a 55 |K$.UG$:U|L$.UT$:U|
|00000550| 4a b2 55 50 3a 55 4b b2 | 55 4c 00 60 15 ff 00 8e |J.UP:UK.|UL.`....|
|00000560| 00 71 15 2c 01 8f 20 2a | 2a 20 4d 45 4e 55 20 2a |.q.,.. *|* MENU *|
|00000570| 2a 00 94 15 2e 01 99 22 | 93 22 3a 99 c7 28 31 34 |*......"|.":..(14|
|00000580| 32 29 3a 97 36 35 33 30 | 31 2c 39 3a 97 36 35 33 |2):.6530|1,9:.653|
|00000590| 30 35 2c 38 00 9e 15 2f | 01 99 3a 99 3a 99 00 bb |05,8.../|..:.:...|
|000005a0| 15 31 01 99 22 20 20 20 | 20 20 20 20 20 20 20 20 |.1.."   |        |
|000005b0| 20 20 20 20 20 20 4d 45 | 4e 55 22 00 ea 15 36 01 |      ME|NU"...6.|
|000005c0| 99 22 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |." -----|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 22 00 14 16 3b 01 99 |--------|-"...;..|
|000005f0| 22 11 11 20 20 20 20 20 | 20 20 31 2e 20 20 20 52 |"..     |  1.   R|
|00000600| 4e 44 20 47 45 4e 45 52 | 41 54 4f 52 20 44 49 53 |ND GENER|ATOR DIS|
|00000610| 50 4c 41 59 00 3e 16 40 | 01 99 22 11 11 20 20 20 |PLAY.>.@|.."..   |
|00000620| 20 20 20 20 32 2e 20 20 | 20 53 54 55 44 45 4e 54 |    2.  | STUDENT|
|00000630| 20 49 4e 53 54 52 55 43 | 54 49 4f 4e 53 22 00 5a | INSTRUC|TIONS".Z|
|00000640| 16 4f 01 99 22 11 11 20 | 20 20 20 20 20 20 33 2e |.O..".. |      3.|
|00000650| 20 20 20 51 55 49 54 11 | 11 22 00 89 16 54 01 99 |   QUIT.|."...T..|
|00000660| 22 20 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |" ------|--------|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000680| 2d 2d 2d 2d 2d 2d 2d 2d | 22 00 b4 16 59 01 99 22 |--------|"...Y.."|
|00000690| 11 11 20 20 20 20 20 20 | 20 50 52 45 53 53 20 41 |..      | PRESS A|
|000006a0| 20 4e 55 4d 42 45 52 20 | 4b 45 59 20 28 31 2d 33 | NUMBER |KEY (1-3|
|000006b0| 29 20 22 3b 00 dc 16 5e | 01 55 4c b2 31 3a 55 53 |) ";...^|.UL.1:US|
|000006c0| 24 b2 22 31 32 33 34 22 | 3a 8d 33 35 3a 8f 20 49 |$."1234"|:.35:. I|
|000006d0| 4e 50 55 54 20 52 4f 55 | 54 49 4e 45 00 ee 16 5f |NPUT ROU|TINE..._|
|000006e0| 01 8b c3 28 55 52 24 29 | b1 31 a7 33 30 30 00 f9 |...(UR$)|.1.300..|
|000006f0| 16 60 01 55 53 24 b2 22 | 22 00 12 17 63 01 91 c5 |.`.US$."|"...c...|
|00000700| 28 55 52 24 29 8d 31 30 | 30 30 2c 34 30 30 2c 33 |(UR$).10|00,400,3|
|00000710| 39 36 00 1b 17 68 01 89 | 33 30 30 00 26 17 8c 01 |96...h..|300.&...|
|00000720| 99 22 93 22 3a 80 00 3d | 17 8d 01 97 36 35 33 30 |.".":..=|....6530|
|00000730| 31 2c 36 3a 97 36 35 33 | 30 35 2c 31 33 00 49 17 |1,6:.653|05,13.I.|
|00000740| 8e 01 99 22 9a 93 22 3a | 80 00 54 17 8f 01 8d 38 |..."..":|..T....8|
|00000750| 37 35 3a 8e 00 75 17 90 | 01 8f 20 2a 2a 20 53 54 |75:..u..|.. ** ST|
|00000760| 55 44 45 4e 54 20 49 4e | 53 54 52 55 43 54 49 4f |UDENT IN|STRUCTIO|
|00000770| 4e 53 20 2a 2a 00 97 17 | 95 01 99 22 93 22 3a 99 |NS **...|...".":.|
|00000780| c7 28 31 34 29 3a 97 36 | 35 33 30 31 2c 30 3a 97 |.(14):.6|5301,0:.|
|00000790| 36 35 33 30 35 2c 30 00 | b3 17 9a 01 55 50 b2 30 |65305,0.|....UP.0|
|000007a0| 3a 55 47 24 b2 22 d3 54 | 55 44 45 4e 54 20 c9 4e |:UG$.".T|UDENT .N|
|000007b0| 53 54 22 00 c1 17 a4 01 | 97 35 39 34 36 38 2c 31 |ST".....|.59468,1|
|000007c0| 34 00 e4 17 ae 01 55 47 | 24 b2 22 20 20 20 c5 58 |4.....UG|$."   .X|
|000007d0| 50 4c 41 4e 41 54 49 4f | 4e 22 3a 55 50 b2 31 3a |PLANATIO|N":UP.1:|
|000007e0| 8d 38 35 30 00 0f 18 b8 | 01 99 22 11 11 20 20 20 |.850....|.."..   |
|000007f0| 20 d4 48 49 53 20 49 53 | 20 41 20 44 49 53 50 4c | .HIS IS| A DISPL|
|00000800| 41 59 20 4f 46 20 54 48 | 45 20 2b 34 27 53 22 00 |AY OF TH|E +4'S".|
|00000810| 3d 18 bd 01 99 22 11 20 | 52 41 4e 44 4f 4d 20 4e |=....". |RANDOM N|
|00000820| 55 4d 42 45 52 20 47 45 | 4e 45 52 41 54 4f 52 2e |UMBER GE|NERATOR.|
|00000830| 20 d4 48 45 20 50 52 4f | 47 52 41 4d 22 00 6b 18 | .HE PRO|GRAM".k.|
|00000840| c2 01 99 22 11 20 53 48 | 4f 57 53 20 54 48 45 20 |...". SH|OWS THE |
|00000850| 46 4f 52 4d 41 54 20 4f | 46 20 41 20 53 54 41 54 |FORMAT O|F A STAT|
|00000860| 45 4d 45 4e 54 20 54 48 | 41 54 22 00 9a 18 c7 01 |EMENT TH|AT".....|
|00000870| 99 22 11 20 47 45 4e 45 | 52 41 54 45 53 20 52 41 |.". GENE|RATES RA|
|00000880| 4e 44 4f 4d 20 4e 55 4d | 42 45 52 53 2e 20 d4 48 |NDOM NUM|BERS. .H|
|00000890| 45 20 50 52 4f 47 52 41 | 4d 22 00 c7 18 cc 01 99 |E PROGRA|M"......|
|000008a0| 22 11 20 41 4c 4c 4f 57 | 53 20 54 48 45 20 55 53 |". ALLOW|S THE US|
|000008b0| 45 52 20 54 4f 20 45 58 | 50 45 52 49 4d 45 4e 54 |ER TO EX|PERIMENT|
|000008c0| 20 57 49 54 48 20 22 00 | f4 18 d1 01 99 22 11 20 | WITH ".|.....". |
|000008d0| 54 48 45 20 53 54 41 54 | 45 4d 45 4e 54 20 42 59 |THE STAT|EMENT BY|
|000008e0| 20 41 53 4b 49 4e 47 20 | 46 4f 52 20 4e 55 4d 42 | ASKING |FOR NUMB|
|000008f0| 45 52 53 22 00 16 19 d6 | 01 99 22 11 20 54 4f 20 |ERS"....|..". TO |
|00000900| 55 53 45 20 49 4e 20 54 | 48 45 20 53 54 41 54 45 |USE IN T|HE STATE|
|00000910| 4d 45 4e 54 2e 22 00 1f | 19 db 01 8d 38 33 35 00 |MENT."..|....835.|
|00000920| 28 19 ea 01 89 32 31 36 | 00 2e 19 f3 01 8e 00 4a |(....216|.......J|
|00000930| 19 43 03 8f 20 2a 2a 20 | 53 50 41 43 45 20 42 41 |.C.. ** |SPACE BA|
|00000940| 52 20 50 52 45 53 53 20 | 2a 2a 00 85 19 48 03 97 |R PRESS |**...H..|
|00000950| 55 4f 2c 30 3a 99 c8 28 | 55 44 24 2c 32 34 29 3b |UO,0:..(|UD$,24);|
|00000960| 22 1d 1d 1d 1d 1d 1d 12 | 50 52 45 53 53 20 53 50 |".......|PRESS SP|
|00000970| 41 43 45 20 42 41 52 20 | 54 4f 20 43 4f 4e 54 49 |ACE BAR |TO CONTI|
|00000980| 4e 55 45 92 22 00 9c 19 | 4c 03 a1 55 49 24 3a 8b |NUE."...|L..UI$:.|
|00000990| 55 49 24 b3 b1 22 20 22 | a7 38 34 34 00 a2 19 4e |UI$.." "|.844...N|
|000009a0| 03 8e 00 c2 19 52 03 8f | 20 2a 2a 20 50 41 47 45 |.....R..| ** PAGE|
|000009b0| 20 44 45 53 49 47 4e 20 | 52 4f 55 54 49 4e 45 20 | DESIGN |ROUTINE |
|000009c0| 2a 2a 00 ce 19 54 03 55 | 50 b2 55 50 aa 31 00 f8 |**...T.U|P.UP.1..|
|000009d0| 19 57 03 99 22 93 22 c8 | 28 55 54 24 aa 55 50 24 |.W..".".|(UT$.UP$|
|000009e0| 2c 32 31 29 3b c9 28 55 | 50 24 aa 55 47 24 aa c4 |,21);.(U|P$.UG$..|
|000009f0| 28 55 50 29 2c 31 38 29 | 00 27 1a 5c 03 99 22 20 |(UP),18)|.'.\.." |
|00000a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a20| 2d 2d 2d 2d 2d 2d 22 00 | 36 1a 60 03 8b 55 48 b3 |------".|6.`..UH.|
|00000a30| b1 30 a7 38 37 30 00 6a | 1a 61 03 99 c8 28 55 44 |.0.870.j|.a...(UD|
|00000a40| 24 2c 32 34 29 3b c8 28 | 55 50 24 2c 37 29 3b 22 |$,24);.(|UP$,7);"|
|00000a50| 48 45 4c 50 20 2d 20 50 | 52 45 53 53 20 20 20 48 |HELP - P|RESS   H|
|00000a60| 20 3c 52 45 54 55 52 4e | 3e 22 00 7c 1a 66 03 97 | <RETURN|>".|.f..|
|00000a70| 55 4f 2c 30 3a 99 22 13 | 11 22 3a 8e 00 9b 1a 6b |UO,0:.".|.":....k|
|00000a80| 03 8f 20 2a 2a 20 50 4c | 45 41 53 45 20 57 41 49 |.. ** PL|EASE WAI|
|00000a90| 54 20 52 45 4d 41 52 4b | 20 2a 2a 00 d1 1a 70 03 |T REMARK| **...p.|
|00000aa0| 99 c8 28 55 44 24 2c 32 | 34 29 3b 22 20 20 20 20 |..(UD$,2|4);"    |
|00000ab0| 20 20 20 20 20 20 20 4f | 4e 45 20 4d 4f 4d 45 4e |       O|NE MOMEN|
|00000ac0| 54 20 50 4c 45 41 53 45 | 2e 2e 2e 20 20 20 20 20 |T PLEASE|...     |
|00000ad0| 22 00 d7 1a 75 03 8e 00 | f4 1a 84 03 8f 20 2a 2a |"...u...|..... **|
|00000ae0| 20 53 45 54 20 55 50 20 | 56 41 52 49 41 42 4c 45 | SET UP |VARIABLE|
|00000af0| 53 20 2a 2a 00 0b 1b 85 | 03 55 58 24 b2 22 48 22 |S **....|.UX$."H"|
|00000b00| 3a 86 55 51 25 28 31 30 | 30 30 29 00 42 1b 87 03 |:.UQ%(10|00).B...|
|00000b10| 55 42 b2 33 30 37 32 3a | 55 31 b2 32 30 30 3a 55 |UB.3072:|U1.200:U|
|00000b20| 32 b2 32 30 31 3a 55 33 | b2 32 30 32 3a 55 34 b2 |2.201:U3|.202:U4.|
|00000b30| 32 30 35 3a 55 43 b2 32 | 30 34 3a 55 55 b2 34 30 |205:UC.2|04:UU.40|
|00000b40| 39 36 00 75 1b 88 03 55 | 54 b2 35 33 32 37 32 3a |96.u...U|T.53272:|
|00000b50| 55 55 25 b2 32 31 3a 55 | 4c 25 b2 32 33 3a 55 50 |UU%.21:U|L%.23:UP|
|00000b60| 25 b2 33 31 36 33 3a 55 | 4d b2 33 30 37 32 3a 55 |%.3163:U|M.3072:U|
|00000b70| 4f b2 32 33 39 00 99 1b | 89 03 55 44 24 b2 22 13 |O.239...|..UD$.".|
|00000b80| 11 11 11 11 11 11 11 11 | 11 11 11 11 11 11 11 11 |........|........|
|00000b90| 11 11 11 11 11 11 11 11 | 22 00 cb 1b 8a 03 55 50 |........|".....UP|
|00000ba0| 24 b2 22 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |$."     |        |
|00000bb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000bc0| 20 20 20 20 20 20 20 20 | 20 20 22 00 f4 1b 8b 03 |        |  ".....|
|00000bd0| 55 54 24 b2 22 20 d2 ce | c4 20 c7 45 4e 45 52 41 |UT$." ..|. .ENERA|
|00000be0| 54 4f 52 22 3a 8f 20 50 | 52 4f 47 52 41 4d 20 54 |TOR":. P|ROGRAM T|
|00000bf0| 49 54 4c 45 00 fa 1b 8c | 03 8e 00 14 1c 8e 03 8f |ITLE....|........|
|00000c00| 20 2a 2a 20 53 45 54 20 | 56 41 52 49 41 42 4c 45 | ** SET |VARIABLE|
|00000c10| 53 20 2a 2a 00 1d 1c 93 | 03 8d 39 30 30 00 23 1c |S **....|..900.#.|
|00000c20| 94 03 3a 00 29 1c 95 03 | 3a 00 38 1c a9 03 99 22 |..:.)...|:.8...."|
|00000c30| 93 05 22 3a 89 39 36 32 | 00 67 1c ac 03 8f 20 2a |..":.962|.g.... *|
|00000c40| 2a 20 42 41 53 49 43 20 | 32 2e 30 20 20 4f 52 20 |* BASIC |2.0  OR |
|00000c50| 20 34 2e 30 20 20 4f 52 | 20 20 43 2d 36 34 20 53 | 4.0  OR|  C-64 S|
|00000c60| 45 54 55 50 20 2a 2a 00 | a5 1c ad 03 97 31 30 37 |ETUP **.|.....107|
|00000c70| 35 2c 31 33 33 3a 97 31 | 30 37 36 2c 31 34 34 3a |5,133:.1|076,144:|
|00000c80| 97 31 30 37 37 2c 32 33 | 34 3a 97 31 30 37 39 2c |.1077,23|4:.1079,|
|00000c90| 34 3a 97 31 30 38 30 2c | 31 33 33 3a 97 31 30 38 |4:.1080,|133:.108|
|00000ca0| 31 2c 31 34 35 00 db 1c | ae 03 97 31 30 39 31 2c |1,145...|...1091,|
|00000cb0| 31 35 35 3a 97 31 30 39 | 38 2c 31 33 33 3a 97 31 |155:.109|8,133:.1|
|00000cc0| 30 39 39 2c 31 34 34 3a | 97 31 31 30 30 2c 32 33 |099,144:|.1100,23|
|00000cd0| 34 3a 97 31 31 30 33 2c | 31 33 33 00 fd 1c af 03 |4:.1103,|133.....|
|00000ce0| 97 31 31 30 34 2c 31 34 | 35 3a 97 31 31 30 35 2c |.1104,14|5:.1105,|
|00000cf0| 32 33 34 3a 97 31 30 38 | 32 2c 32 33 34 00 14 1d |234:.108|2,234...|
|00000d00| b1 03 8b c2 28 35 30 30 | 30 33 29 b3 b1 31 36 30 |....(500|03)..160|
|00000d10| a7 39 35 35 00 43 1d b6 | 03 97 31 30 39 33 2c 38 |.955.C..|..1093,8|
|00000d20| 38 3a 97 31 30 39 34 2c | 32 32 38 3a 97 31 30 39 |8:.1094,|228:.109|
|00000d30| 37 2c 38 35 3a 97 31 31 | 30 32 2c 32 32 38 3a 89 |7,85:.11|02,228:.|
|00000d40| 39 36 35 00 58 1d bb 03 | 8b c2 28 35 30 30 30 33 |965.X...|..(50003|
|00000d50| 29 b3 b1 31 a7 39 39 30 | 00 87 1d c0 03 97 31 30 |)..1.990|......10|
|00000d60| 39 33 2c 34 39 3a 97 31 | 30 39 34 2c 32 33 30 3a |93,49:.1|094,230:|
|00000d70| 97 31 30 39 37 2c 34 36 | 3a 97 31 31 30 32 2c 32 |.1097,46|:.1102,2|
|00000d80| 33 30 3a 89 39 36 35 00 | c1 1d c2 03 97 32 30 39 |30:.965.|.....209|
|00000d90| 39 2c 31 34 31 3a 97 32 | 31 30 30 2c 32 30 3a 97 |9,141:.2|100,20:.|
|00000da0| 32 31 30 31 2c 33 3a 97 | 32 31 30 33 2c 38 3a 97 |2101,3:.|2103,8:.|
|00000db0| 32 31 30 34 2c 31 34 31 | 3a 97 32 31 30 35 2c 32 |2104,141|:.2105,2|
|00000dc0| 31 00 fd 1d c3 03 97 32 | 31 30 36 2c 33 3a 97 32 |1......2|106,3:.2|
|00000dd0| 31 31 35 2c 31 34 35 3a | 97 32 31 31 37 2c 35 32 |115,145:|.2117,52|
|00000de0| 3a 97 32 31 31 38 2c 32 | 33 34 3a 97 32 31 32 31 |:.2118,2|34:.2121|
|00000df0| 2c 34 39 3a 97 32 31 32 | 32 2c 31 34 31 00 37 1e |,49:.212|2,141.7.|
|00000e00| c4 03 97 32 31 32 33 2c | 32 30 3a 97 32 31 32 34 |...2123,|20:.2124|
|00000e10| 2c 33 3a 97 32 31 32 36 | 2c 32 33 34 3a 97 32 31 |,3:.2126|,234:.21|
|00000e20| 32 37 2c 31 34 31 3a 97 | 32 31 32 38 2c 32 31 3a |27,141:.|2128,21:|
|00000e30| 97 32 31 32 39 2c 33 00 | 40 1e ca 03 89 33 30 30 |.2129,3.|@....300|
|00000e40| 00 50 1e d4 03 89 33 30 | 30 3a 8f 20 4d 45 4e 55 |.P....30|0:. MENU|
|00000e50| 00 75 1e e8 03 55 5a b2 | 30 3a 8f 20 2a 2a 20 50 |.u...UZ.|0:. ** P|
|00000e60| 52 4f 47 52 41 4d 20 53 | 54 41 52 54 53 20 48 45 |ROGRAM S|TARTS HE|
|00000e70| 52 45 20 2a 2a 00 95 1e | e9 03 99 22 93 05 22 3b |RE **...|..."..";|
|00000e80| 3a 8c 3a 97 36 35 33 30 | 31 2c 36 3a 97 36 35 33 |:.:.6530|1,6:.653|
|00000e90| 30 35 2c 31 33 00 9e 1e | 4c 04 99 22 93 22 00 cf |05,13...|L.."."..|
|00000ea0| 1e a6 04 99 22 93 11 20 | 4a 55 53 54 20 54 48 49 |....".. |JUST THI|
|00000eb0| 4e 4b 20 48 4f 57 20 42 | 4f 52 49 4e 47 20 4d 4f |NK HOW B|ORING MO|
|00000ec0| 53 54 20 47 41 4d 45 53 | 20 57 4f 55 4c 44 22 00 |ST GAMES| WOULD".|
|00000ed0| fc 1e b0 04 99 22 11 20 | 42 45 20 57 49 54 48 4f |.....". |BE WITHO|
|00000ee0| 55 54 20 41 4e 59 20 53 | 4f 52 54 20 4f 46 20 43 |UT ANY S|ORT OF C|
|00000ef0| 48 41 4c 4c 45 4e 47 45 | 20 54 4f 22 00 2c 1f ba |HALLENGE| TO".,..|
|00000f00| 04 99 22 11 20 54 48 45 | 4d 2e 20 42 55 54 20 4c |..". THE|M. BUT L|
|00000f10| 55 43 4b 49 4c 59 20 54 | 48 45 52 45 20 49 53 20 |UCKILY T|HERE IS |
|00000f20| 41 20 53 54 41 54 45 4d | 45 4e 54 22 00 5c 1f c4 |A STATEM|ENT".\..|
|00000f30| 04 99 22 11 20 49 4e 20 | 42 41 53 49 43 20 54 48 |..". IN |BASIC TH|
|00000f40| 41 54 20 41 44 44 53 20 | 41 20 53 4c 49 47 48 54 |AT ADDS |A SLIGHT|
|00000f50| 20 44 49 46 46 45 52 45 | 4e 43 45 22 00 86 1f ce | DIFFERE|NCE"....|
|00000f60| 04 99 22 11 20 54 4f 20 | 41 20 47 41 4d 45 2e 20 |..". TO |A GAME. |
|00000f70| 54 48 49 53 20 53 54 41 | 54 45 4d 45 4e 54 20 49 |THIS STA|TEMENT I|
|00000f80| 53 20 54 48 45 22 00 a8 | 1f d8 04 99 22 11 20 52 |S THE"..|....". R|
|00000f90| 41 4e 44 4f 4d 20 4e 55 | 4d 42 45 52 20 47 45 4e |ANDOM NU|MBER GEN|
|00000fa0| 45 52 41 54 4f 52 2e 22 | 00 d9 1f e2 04 99 22 11 |ERATOR."|......".|
|00000fb0| 11 11 11 1d 1d 1d 1d 1d | 54 48 45 20 53 54 41 54 |........|THE STAT|
|00000fc0| 45 4d 45 4e 54 20 4c 4f | 4f 4b 53 20 4c 49 4b 45 |EMENT LO|OKS LIKE|
|00000fd0| 20 54 48 49 53 3a 20 20 | 22 00 f8 1f ec 04 99 a3 | THIS:  |".......|
|00000fe0| 31 30 29 22 11 11 41 3d | 49 4e 54 28 42 2b 52 4e |10)"..A=|INT(B+RN|
|00000ff0| 44 28 31 29 2a 43 29 22 | 00 01 20 f6 04 8d 38 33 |D(1)*C)"|.. ...83|
|00001000| 35 00 0a 20 0a 05 99 22 | 93 22 00 27 20 14 05 99 |5.. ..."|.".' ...|
|00001010| a3 31 30 29 22 41 3d 49 | 4e 54 28 42 2b 52 4e 44 |.10)"A=I|NT(B+RND|
|00001020| 28 31 29 2a 43 29 22 00 | 4b 20 1e 05 99 a3 35 29 |(1)*C)".|K ....5)|
|00001030| 22 11 41 20 49 53 20 54 | 48 45 20 52 41 4e 44 4f |".A IS T|HE RANDO|
|00001040| 4d 20 56 41 52 49 41 42 | 4c 45 22 00 6e 20 28 05 |M VARIAB|LE".n (.|
|00001050| 99 a3 35 29 22 11 42 20 | 49 53 20 54 48 45 20 4c |..5)".B |IS THE L|
|00001060| 4f 57 45 53 54 20 41 20 | 56 41 4c 55 45 22 00 9b |OWEST A |VALUE"..|
|00001070| 20 32 05 99 a3 35 29 22 | 11 43 2c 20 4c 45 53 53 | 2...5)"|.C, LESS|
|00001080| 20 4f 4e 45 2c 20 50 4c | 55 53 20 42 20 45 51 55 | ONE, PL|US B EQU|
|00001090| 41 4c 53 20 54 48 45 20 | 20 20 22 00 b4 20 3c 05 |ALS THE |  ".. <.|
|000010a0| 99 a3 35 29 22 11 48 49 | 47 48 45 53 54 20 56 41 |..5)".HI|GHEST VA|
|000010b0| 4c 55 45 22 00 e5 20 46 | 05 99 22 11 20 54 48 45 |LUE".. F|..". THE|
|000010c0| 52 45 46 4f 52 45 2c 49 | 46 20 57 45 20 53 55 42 |REFORE,I|F WE SUB|
|000010d0| 53 54 49 54 55 54 45 20 | 53 4f 4d 45 20 4e 55 4d |STITUTE |SOME NUM|
|000010e0| 42 45 52 53 22 00 13 21 | 50 05 99 22 20 46 4f 52 |BERS"..!|P.." FOR|
|000010f0| 20 41 2c 20 42 20 41 4e | 44 20 43 20 57 45 20 57 | A, B AN|D C WE W|
|00001100| 49 4c 4c 20 48 41 56 45 | 20 41 20 57 4f 52 4b 49 |ILL HAVE| A WORKI|
|00001110| 4e 47 22 00 35 21 5a 05 | 99 22 11 20 52 41 4e 44 |NG".5!Z.|.". RAND|
|00001120| 4f 4d 20 4e 55 4d 42 45 | 52 20 47 45 4e 45 52 41 |OM NUMBE|R GENERA|
|00001130| 54 4f 52 2e 22 00 53 21 | 64 05 99 a3 31 30 29 22 |TOR.".S!|d...10)"|
|00001140| 11 41 3d 49 4e 54 28 31 | 2b 52 4e 44 28 31 29 2a |.A=INT(1|+RND(1)*|
|00001150| 31 30 29 00 84 21 6e 05 | 99 22 11 20 54 48 49 53 |10)..!n.|.". THIS|
|00001160| 20 53 54 41 54 45 4d 45 | 4e 54 20 57 49 4c 4c 20 | STATEME|NT WILL |
|00001170| 47 49 56 45 20 59 4f 55 | 20 4e 55 4d 42 45 52 53 |GIVE YOU| NUMBERS|
|00001180| 20 4e 4f 22 00 b3 21 78 | 05 99 22 20 47 52 45 41 | NO"..!x|.." GREA|
|00001190| 54 45 52 20 54 48 41 4e | 20 54 45 4e 20 41 4e 44 |TER THAN| TEN AND|
|000011a0| 20 4e 4f 20 4c 45 53 53 | 20 54 48 41 4e 20 4f 4e | NO LESS| THAN ON|
|000011b0| 45 2e 22 00 bc 21 82 05 | 8d 38 33 35 00 d4 21 96 |E."..!..|.835..!.|
|000011c0| 05 99 22 93 22 3a 42 b2 | 31 3a 43 b2 31 30 3a 8d |..".":B.|1:C.10:.|
|000011d0| 31 35 32 30 00 05 22 a0 | 05 99 22 11 20 4e 4f 57 |1520..".|..". NOW|
|000011e0| 20 49 54 53 20 59 4f 55 | 52 20 54 55 52 4e 20 54 | ITS YOU|R TURN T|
|000011f0| 4f 20 4d 4f 44 49 46 59 | 20 54 48 45 20 42 20 41 |O MODIFY| THE B A|
|00001200| 4e 44 20 43 22 00 30 22 | aa 05 99 22 11 20 12 20 |ND C".0"|...". . |
|00001210| 54 4f 20 51 55 49 54 20 | 45 4e 54 45 52 20 5a 45 |TO QUIT |ENTER ZE|
|00001220| 52 4f 20 46 4f 52 20 42 | 20 41 4e 44 20 43 92 22 |RO FOR B| AND C."|
|00001230| 00 76 22 b4 05 99 22 11 | 20 49 4e 50 55 54 20 41 |.v"...".| INPUT A|
|00001240| 20 4e 55 4d 42 45 52 20 | 46 4f 52 20 42 3a 20 22 | NUMBER |FOR B: "|
|00001250| 3b 3a 55 53 24 b2 22 2d | 30 31 32 33 34 35 36 37 |;:US$."-|01234567|
|00001260| 38 39 48 22 3a 55 4c b2 | 35 3a 8d 33 35 3a 42 b2 |89H":UL.|5:.35:B.|
|00001270| c5 28 55 52 24 29 00 a4 | 22 be 05 99 22 11 20 49 |.(UR$)..|"...". I|
|00001280| 4e 50 55 54 20 41 20 4e | 55 4d 42 45 52 20 46 4f |NPUT A N|UMBER FO|
|00001290| 52 20 43 3a 20 22 3b 3a | 8d 33 35 3a 43 b2 c5 28 |R C: ";:|.35:C..(|
|000012a0| 55 52 24 29 00 ad 22 c8 | 05 99 22 93 22 00 bf 22 |UR$)..".|..".".."|
|000012b0| d2 05 8b 42 b2 30 af 43 | b2 30 a7 31 35 31 30 00 |...B.0.C|.0.1510.|
|000012c0| cf 22 dc 05 8d 31 35 32 | 30 3a 89 31 34 36 30 00 |."...152|0:.1460.|
|000012d0| d5 22 e6 05 8e 00 fb 22 | f0 05 99 22 11 20 48 45 |."....."|...". HE|
|000012e0| 52 45 20 41 52 45 20 54 | 45 4e 20 52 41 4e 44 4f |RE ARE T|EN RANDO|
|000012f0| 4d 20 4e 55 4d 42 45 52 | 53 11 22 00 15 23 fa 05 |M NUMBER|S."..#..|
|00001300| 81 54 b2 31 a4 31 30 3a | 41 b2 b5 28 42 aa bb 28 |.T.1.10:|A..(B..(|
|00001310| 31 29 ac 43 29 00 42 23 | 04 06 99 41 3b 3a 82 54 |1).C).B#|...A;:.T|
|00001320| 3a 99 3a 99 22 11 20 57 | 48 45 4e 20 42 20 3d 22 |:.:.". W|HEN B ="|
|00001330| 3b 42 3b 22 41 4e 44 20 | 43 20 3d 22 3b 43 3b 22 |;B;"AND |C =";C;"|
|00001340| 2e 22 00 48 23 0e 06 8e | 00 00 00                |.".H#...|...     |
+--------+-------------------------+-------------------------+--------+--------+